Windows Forms - Objeto IS
O objeto is consegue identificar se é dígito(Numérico-0 a 9), letra(A a Z e a a z), espaço em branco
ou pontuação.
Muito útil para classificar o tipo de um string antes de fazer uma conversão.
Module ObjetoIS
'determinação do tipo de dado
' char meuchar = 'a'; //letra
' char meuchar = 'A'; //letra
' char meuchar = '5'; //digito
' char meuchar = '.'; //pontuação
' char meuchar = ','; //pontuação
' char meuchar = ' '; //espaço
' char meuchar = '\n'; //crlf
' Dim meuchar As Char = "\t" 'espaço
Verificando se é Numérico
Function ENumerico(dado As Object) As Boolean
'É um dígito Numérico(0 a 9)
If Char.IsDigit(dado) Then
Return True
Else
Return False
End If
End Function
Verificando se é Letra
Function ELetra(dado As Object) As Boolean
'É uma letra(A a Z e a a z)
If Char.IsLetter(dado) Then
Return True
Else
Return False
End If
End Function
Verificando se é Espaço em branco
Function EEspacoEmBranco(dado As Object) As Boolean
If Char.IsWhiteSpace(dado) Then
Return True
Else
Return False
End If
End Function
Verificando se é Pontuação
Function EPontuacao(dado As Object) As Boolean
If Char.IsPunctuation(dado) Then
Return True
Else
Return False
End If
End Function
End Module